Celestin Apprentice 4/Apprentice-Release4.iso/Source Code/C/Applications/MacPerl 5.0.3/Preinstalled MacPerl (FAT)/t/mac/Pick.t

Text File | 1993-10-23 | 106 b | 4 lines | [TEXT/McPL]

#!/usr/bin/perl

print &MacPerl'Pick("What's your favorite colour baby ?", "red", "green", "blue"), "\n";